home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: delta / whiteline CD Series - delta.iso / tex / cstex / disk4 / m_emacs.lzh / BIN / TEXOUT.CMD < prev   
Encoding:
Text File  |  1990-11-13  |  813 b   |  34 lines
  1. ;  Command file to decode Atari TeX files into portable TeX files
  2. ;
  3. ;  decodes     ä -> "a    etc.
  4. ;
  5. ;  since the double quote cannot be directly entered into a string,
  6. ;  we must do a trick with &cat here.
  7. ;
  8. ;  call it with:       M-x execute-file texout.cmd
  9. ;
  10. ;  -cs
  11. ;
  12.     add-mode "exact"
  13.     delete-mode "magic"
  14. ;
  15.     beginning-of-file
  16.     replace-string "ä" &cat &chr 34 "a"
  17.     beginning-of-file
  18.     replace-string "ö" &cat &chr 34 "o"
  19.     beginning-of-file
  20.     replace-string "ü" &cat &chr 34 "u"
  21.     beginning-of-file
  22.     replace-string "Ä" &cat &chr 34 "A"
  23.     beginning-of-file
  24.     replace-string "Ö" &cat &chr 34 "O"
  25.     beginning-of-file
  26.     replace-string "Ü" &cat &chr 34 "U"
  27.     beginning-of-file
  28.     replace-string "ß" &cat &chr 34 "s"
  29.     beginning-of-file
  30.     replace-string "§" "\S{}"
  31.     beginning-of-file
  32. ;
  33. ;  -eof-
  34.